home *** CD-ROM | disk | FTP | other *** search
/ F1 Licenseware / F1 Licenseware - Volume 1.iso / disks / 060.dms / 060.adf / Install_Quiz < prev    next >
Text File  |  1992-09-02  |  4KB  |  183 lines
  1. ;
  2. ;  ________________________________________________________________
  3. ; /                                                                \
  4. ; \                THE ULTIMATE QUIZ Installer V2.0                /
  5. ; /               Written by Andy Gibson of AGAS Inc.              \
  6. ; \      Updated during MARCH 1994 to suit the the NEW Version.    /
  7. ; /              Uses the Official Commodore Installer.            \
  8. ; \________________________________________________________________/
  9. ;
  10. ;
  11. ;Display welcome text (doesn't seem to work under Kickstart 1.3 !)
  12. (message
  13. ;PROMT
  14. "\n\n"
  15. "AGAS Inc. presents THE ULTIMATE QUIZ Vol.1 \n\n"
  16. ; #intro-text
  17. "This Installer can be used to copy all the files\n"
  18. "to your Hard Disk.\n"
  19. "\n\n"
  20. "A directory named 'THE_QUIZ' will be created.\n\n"
  21. "Please select HELP (below) for more deatails.\n"
  22.  
  23. (Help
  24. "\n     THE ULTIMATE QUIZ Volume 1 (NEW VERSION)\n"
  25. "\n\n"
  26. "Please refer to the INSTALL.Doc on this disk as it\n"
  27. "contains all the information that you will need to\n"
  28. "know about Installing this game onto your H.D.\n"
  29. "\n"
  30. "\n"
  31. "If in doubt ... contact myself.\n"
  32. "\n"
  33. "ANDY GIBSON (my address is in the doc files.)"
  34.  )
  35.  )
  36.  
  37.  
  38. (welcome)
  39.  
  40. (complete 0)
  41.  
  42.  
  43. (set TQ_dest
  44.    (askdir
  45.    (prompt "In which partition or drawer do you want\n "
  46.            "the game and its files to be installed into ?")
  47.      (help "This installation will create a drawer named\n"
  48.            "The_Quiz in your choice of directory.\n"
  49.            "All of the files needed to run The Game\n"
  50.            "will be placed inside that directory. \n\n"
  51. )
  52.     (default @default-dest)
  53. )
  54. )
  55.  
  56.  
  57. ; get the program disk
  58. (askdisk
  59.       (prompt "Please insert the disk labeled \"The_Quiz\"" )
  60.       (help "All files will be copied from that disk "
  61.                   "on to your system." )
  62.       (dest "The_Quiz" )
  63. )
  64.  
  65.  
  66. ; Make dest directory with icon
  67. (makedir (tackon TQ_dest "The_Quiz") (infos))
  68. (complete 10)
  69.  
  70.  
  71. ; now, we want everything to be copied into this sub-dir
  72. (set TQ_dest (tackon TQ_dest "The_Quiz"))
  73. (set @default-dest TQ_dest)
  74.  
  75.  
  76. ;copy the files over now ...
  77. ;**********
  78. (copyfiles
  79.      (source "The_Quiz:Quiz"
  80. (Optional "force") 
  81.     (dest TQ_dest) (infos)
  82. )
  83. )
  84. (complete 40)
  85.  
  86. ;**********
  87. (copyfiles
  88. (source "The_Quiz:Quiz1.Data"
  89. (Optional "force")
  90. (Dest TQ_Dest) (Infos)
  91. )
  92. )
  93. (Complete 50)
  94.  
  95. ;**********
  96. (copyfiles
  97. (source "The_Quiz:Quiz2.Data"
  98. (Optional "force")
  99. (Dest TQ_Dest) (Infos)
  100. )
  101. )
  102. (Complete 55)
  103.  
  104. ;**********
  105. (copyfiles
  106. (source "The_Quiz:Quiz3.Data"
  107. (Optional "force")
  108. (Dest TQ_Dest) (Infos)
  109. )
  110. )
  111. (Complete 60)
  112.  
  113. ;**********
  114. (copyfiles
  115. (source "The_Quiz:Quiz4.Data"
  116. (Optional "force")
  117. (Dest TQ_Dest) (Infos)
  118. )
  119. )
  120. (Complete 65)
  121.  
  122. ;**********
  123. (copyfiles
  124. (source "The_Quiz:Quiz5.Data"
  125. (Optional "force")
  126. (Dest TQ_Dest) (Infos)
  127. )
  128. )
  129. (Complete 70)
  130.  
  131. ;**********
  132. (copyfiles
  133. (source "The_Quiz:Quiz6.Data"
  134. (Optional "force")
  135. (Dest TQ_Dest) (Infos)
  136. )
  137. )
  138. (Complete 75)
  139.  
  140. ;**********
  141. (copyfiles
  142. (source "The_Quiz:Quiz7.Data"
  143. (Optional "force")
  144. (Dest TQ_Dest) (Infos)
  145. )
  146. )
  147. (Complete 80)
  148.  
  149. ;**********
  150. (copyfiles
  151. (source "The_Quiz:Quiz8.Data"
  152. (Optional "force")
  153. (Dest TQ_Dest) (Infos)
  154. )
  155. )
  156. (Complete 85)
  157.  
  158. ;**********
  159. (copyfiles
  160. (source "The_Quiz:Quiz9.Data"
  161. (Optional "force")
  162. (Dest TQ_Dest) (Infos)
  163. )
  164. )
  165. (Complete 90)
  166.  
  167. ;**********
  168. (copyfiles
  169. (source "The_Quiz:Quiz10.Data"
  170. (Optional "force")
  171. (Dest TQ_Dest) (Infos)
  172. )
  173. )
  174. (Complete 100)
  175.  
  176. (exit "Have Fun - Enjoy The Game."
  177. "\n\n"
  178. "PLEASE DO NOT SPREAD IT AROUND\n\n"
  179. "Any comments or suggestions are always\n"
  180. "welcome. Contact myself at anytime.\n\n"
  181. "ANDY GIBSON                     ;-)"
  182. )
  183.